home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994…tember: Reference Library / Dev.CD Sep 94.toast / Periodicals / develop / develop Issue 11 / develop 11 code / The NetWork Project / Examples (Sources) / NetSim / NetSimGlobal.p < prev    next >
Encoding:
Text File  |  1992-07-15  |  1.5 KB  |  57 lines  |  [TEXT/MPS ]
  1. { NetSimGlobal.p     © Copyright G. Sawitzki, 1988-1991}
  2.  
  3. Unit NetSimGlobal;
  4. interface
  5.  
  6. {application specific globals}
  7.     
  8. type 
  9.     {These are the commands we understand. 
  10.     Sorry, not the required Apple Events so far.}
  11.     
  12.     tAction = (aNoop,aExample,aDone,aShow,aSetConfig);
  13.  
  14. const cMyMsgHeaderVersion=5;    
  15.  
  16. type 
  17.     {This is the format used to pass internal control messages, and to
  18.     communicate.
  19.     
  20.     We prefer to have the same header format for tasks and results. So the
  21.     header has some overhead.}
  22.     
  23.     tMsgHeaderPtr=^tMsgHeader;
  24.     tMsgHeader=record
  25.         {for debugging & tracing -added as head}
  26.         SampleStat:extended;
  27.         traceInfo:longint; {more application specific information. Will be a frequency in this example}
  28.         version: longint;    {good programming practice: use version id in a non-controlled environment}
  29.         action : tAction;        {action codes. Generated by master, returned just for info on reply} 
  30.         ContentsToken:    longint;    {type of contents.
  31.                                 'NONE'    test load, if any
  32.                                 'DATA'    raw data vector
  33.                                 'SDAT'    sorted data
  34.                                 'PICT'    displayable picture
  35.                                 'CONF'    configuration info
  36.                                 'CAPS'    capabilities info
  37.                                 }
  38.         DistributionToken:longint;
  39.                                 {distribution.
  40.                                 'UNIF'    Uniform
  41.                                 'GAUS'    Gaussian/Normal
  42.                                 'Cchy'    Cauchy
  43.                                 }
  44.         DisplayToken:longint;
  45.                                 {display type.
  46.                                 'SCAT'    Scatter-Diagram
  47.                                 'SUMM'    Summary report
  48.                                 'Hist'    Histogram
  49.                                 'BoxW'  Box&Whisker plot
  50.                                 }
  51.         SampleSize:integer;
  52.     end;
  53.     
  54. implementation 
  55.  
  56.  
  57. end.